home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / jovept2.arc / RAWIO.ASM < prev    next >
Assembly Source File  |  1985-05-30  |  512b  |  38 lines
  1. ; raw i/o returns using ibm bios ints.
  2. ; k. mitchum 12/84.
  3.  
  4.     include model.h
  5.     include prologue.h
  6.  
  7.     public rawgetc, rawchkc
  8.  
  9. if @bigmodel
  10. rawchkc    proc far
  11. else
  12. rawchkc    proc near
  13. endif
  14.         mov    ah,1
  15.         int    16h
  16.         jz    rawchk1    ;if no character
  17.         mov    ax,1
  18.         ret
  19. rawchk1:
  20.         mov    ax,0
  21.         ret
  22. rawchkc    endp
  23.  
  24. if @bigmodel
  25. rawgetc    proc far
  26. else
  27. rawgetc    proc near
  28. endif
  29.         mov    ah,0
  30.         int    16h
  31.         ret
  32. rawgetc    endp
  33.  
  34.     include epilogue.h
  35.  
  36.     end
  37.  
  38.